home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga News 95
/
Amiga News 95.iso
/
dpat
/
dpat96
/
klondike_adptools_v1.1
/
install klondike adptools
< prev
next >
Wrap
Text File
|
1995-05-01
|
4KB
|
157 lines
;
; $VER: Klondike ADPTools Installation v1.1 (06.04.95)
;
(complete 0)
(if (< (/ (getversion) 65536) 39)
(abort "\nDésolé, ce programme nécessite l'OS 3.0 ou supérieur !")
)
(if (not (exists "ADPRO:" (quiet)))
(abort "\nAssign ADPRO: non trouvé !\n"
"ADPro n'est pas présent dans votre système ou est mal installé."
)
)
(welcome)
(message "\nKlondike ADPTools v1.1\n"
"- The ADPro tool kit for Klondike -\n"
"Copyright © (06.04.95) Lejardinier Olivier\n"
"All rights reserved.\n\n"
"Cet ensemble de programmes ARexx pour ADPro vous "
"permet de créer *FACILEMENT* vos propres jeux de "
"cartes pour le fabuleux jeu KLONDIKE AGA.\n\n"
"Ce programme est *SHAREWARE* non limité.\n\n"
"Pour plus de détails, lisez la documentation."
)
(set choice
(askchoice
(prompt "\nQuelle version voulez-vous utiliser ?\n")
(help (cat "\nVous devez sélectionner la langue dans laquelle seront "
"les programmes de Klondike ADPTools.\n\n"
@askchoice-help
)
)
(choices "Française"
"Anglaise"
)
(default 0)
)
)
(set @default-dest "ADPRO:Commands2")
(makedir "T:Klondike_ADPTools")
(working "Désarchivage des programmes ARexx...")
(if (= choice 0)
(run "Datas/LHEX -fwT:Klondike_ADPTools x Datas/French.LHA")
(run "Datas/LHEX -fwT:Klondike_ADPTools x Datas/English.LHA")
)
(copyfiles
(source "T:Klondike_ADPTools")
(pattern "#?.adpro")
(dest @default-dest)
(files)
)
(run "C:Delete T:Klondike_ADPTools/#?.adpro")
(copyfiles
(source "Datas/Reko")
(dest "C:")
(files)
)
(complete 30)
(set @default-dest "ADPRO:")
(set destination
(askdir
(prompt (cat "\nOu voulez-vous installer le répertoire 'Klondike_ADPTools' ?\n"
"(Le répertoire 'Klondike_ADPTools' sera créé)\n"
)
)
(help (cat "\nVous devez sélectionner l'emplacement où seront copiées "
"la (ou les) documentation(s) ainsi que les données nécessaires "
"au bon fonctionnement des programmes.\n\n"
"Note : Le répertoire 'Klondike_ADPTools' sera créé automatiquement.\n\n"
@askdir-help
)
)
(default @default-dest)
)
)
(set destination (tackon destination "Klondike_ADPTools"))
(makedir destination (infos))
(complete 60)
(set choice
(askchoice
(prompt "\nQuel format de documentation voulez-vous utiliser ?\n")
(help (cat "\nVous devez sélectionner le format de documentation que vous "
"désirez utiliser.\n\n"
"AmigaGuide : à visualiser avec Multiview.\n"
"Doc : format ASCII normal (ideal pour une sortie sur "
"imprimante), à visualiser avec More, Multiview...\n\n"
@askchoice-help
)
)
(choices "AmigaGuide"
"Doc"
"AmigaGuide & Doc"
)
(default 0)
)
)
(copyfiles
(source "")
(if (= choice 0)
(choices "Klondike_ADPTools.Guide")
(if (= choice 1)
(choices "Klondike_ADPTools.Doc")
(choices "Klondike_ADPTools.Guide" "Klondike_ADPTools.Doc")
)
)
(dest destination)
(files)
(infos)
(noposition)
)
(complete 90)
(working "Désarchivage des fichiers 'Templates'...")
(run "Datas/LHEX -fwT:Klondike_ADPTools x Datas/Templates.LHA")
(copyfiles
(source "T:Klondike_ADPTools")
(pattern "#?")
(dest (tackon destination "Templates"))
(files)
(infos)
)
(run "C:Delete T:Klondike_ADPTools/#?")
(working "Désarchivage des fichiers 'Symbols'...")
(run "Datas/LHEX -fwT:Klondike_ADPTools x Datas/Symbols.LHA")
(copyfiles
(source "T:Klondike_ADPTools")
(pattern "#?")
(dest (tackon destination "Symbols"))
(files)
(infos)
)
(run "C:Delete T:Klondike_ADPTools ALL")
(complete 100)
(message "\nVous pouvez maintenant lancer ADPro pour utiliser Klondike ADPTools.")
(exit)